A = Point(xAxis)
B = Point(xAxis)
a = Segment(A, B)
b = OrthogonalLine(B, a)
c = OrthogonalLine(A, a)
C_1 = Point(yAxis)
d = OrthogonalLine(C_1, b)
C = Intersect(b, d)
D = Intersect(c, d)
polígono1, a_1, b_1, c_1, d_1 = Polygon(A, B, C, D)
E = Midpoint(a)
e = Segment(A, E)
P = Point(e)
f = Circle(A, P)
g = OrthogonalLine(P, a_1)
G, H = Intersect(f, c)
h = OrthogonalLine(H, d_1)
k = Circle(D, Segment[A, P])
I, J = Intersect(k, c)
i = OrthogonalLine(I, d_1)
F' = Mirror(P, E)
j = OrthogonalLine(F', a_1)
K = Intersect(g, h)
L = Intersect(j, h)
M, N = Intersect(h, polígono1)
O, P_1 = Intersect(i, polígono1)
Q = Intersect(i, j)
R, S = Intersect(j, polígono1)
T = Intersect(g, i)
U, V_1 = Intersect(g, polígono1)
polígono2, f_1, f', l, n, p, q, s, v, t, i_1, h_1, k_1 = Polygon(P, F', L, N, P_1, Q, S, V_1, T, I, H, K)
Z = (12.53216915316089, 4.436196200493721)
W = Intersect(xAxis, yAxis)
A_1 = (10.282089986379821, 3.9888572110828444)
m = Ray(W, A_1)
r = Circle(W, Segment[A, P])
P_2 = Intersect(r, yAxis, 2)
e_1 = Circle(W, Segment[N, P_1])
g_1 = Circle(W, Segment[P, F'])
B_1 = Intersect(g_1, m, 1)
D_1 = Intersect(e_1, xAxis, 2)
j_1 = Segment(W, P_2)
l_1 = Segment(W, B_1)
m_1 = Segment(W, D_1)
o: ((j_1 * l_1) * m_1)
V: (y(P_2), o)
u = Vector(W, P_2)
w = Vector(W, B_1)
z = Vector(W, D_1)
W' = Translate(W, z)
P' = Translate(P_2, z)
n_1 = Segment(W', P')
W'_1 = Translate(W, u)
E_1 = Translate(D_1, u)
p_1 = Segment(W'_1, E_1)
polígono3, p_2, w_1, d_2, p' = Polygon(P_2, W, D_1, P')
P'_1 = Translate(P_2, w)
W'_2 = Translate(W, w)
F_1 = Translate(D_1, w)
P'' = Translate(P', w)
polígono3', p'_1, w'_2, f_2, p'' = Polygon(P'_1, W'_2, F_1, P'')
polígono4, w_2, d_3, f_3, b_2 = Polygon(W, D_1, F_1, B_1)
polígono5, w_3, p_3, p'_2, b_3 = Polygon(W, P_2, P'_1, B_1)
P'_2 = Translate(P_2, z)
G_1 = Translate(P'_1, z)
q_1 = Segment(P'_2, G_1)